home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ham Radio 2000 #2
/
Ham Radio 2000 - Volume 2.iso
/
HAMV2
/
ANTENNA
/
YAGIU112
/
REFCO.C
< prev
next >
Wrap
C/C++ Source or Header
|
1995-08-07
|
482b
|
26 lines
#include <stdio.h>
#include <math.h>
#include <errno.h>
#include "yagi.h"
extern int errno;
extern double Zo;
void reflection_coefficient(struct FCOMPLEX zi, double *magnitude, double *phase)
{
struct FCOMPLEX zo, rho;
/* reflection coefficient rho = (Zi-Zo)/(Zi+Zo) */
zo.r=Zo;
zo.i=0;
rho=Cdiv(Csub(zi, zo), Cadd(zi,zo));
*magnitude=Cabs(rho);
*phase=atan2(rho.i,rho.r);
#ifdef DEBUG
if(errno)
{
fprintf(stderr,"Errno =%d in refco.c \n", errno);
exit(1);
}
#endif
}